home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
422mods.zip
/
REPLYEM.422
< prev
next >
Wrap
Text File
|
1993-02-08
|
3KB
|
82 lines
WHIP14.MOD
Whiplash #1 @3651
Wed Feb 03 07:42:25 1993
┌────────────────────────────────────────────────────────────────────────────┐
│ Mod Name: WHIP14.MOD Mod Author: Whiplash │
│ Difficulty: Easy Date: February 1, 1993 │
│ WWIV Version: 4.22 │
│ Description: Asks a user if he really wants to reply to a message in │
│ email. │
└────────────────────────────────────────────────────────────────────────────┘
As most of you might realize, I have not released any of my mods in a long
time. Most of them are small and worthless, so I never released them, but
someone told me I should release a few of my handy ones, so I am putting
this one up today.
If you are a sysop like me, you like the users of the system to respond to
messages publically, and not in email. Unfortunately, Telegard uses A to
reply to messages, and half the users on my system, don't realize they are
on a WWIV system.
What this mod does is simply asks a user if they are sure that they want to
reply publically when they hit A at the message base prompt.
Step #1: Back up MSGBASE1.C.
Step #2: Open up MSGBASE1.C
Step #3: Go into void scan(int msgnum, int optype, int *nextsub); and search
for case 'A' and replace it with this one:
case 'A':
nl();
prt(5,"Make this reply public 1[3y/N1]3? ");
if (yn()) {
deleted_flag=0;
grab_quotes(&(msgs[msgnum].msg),subboards[curlsub].filename);
post();
if (deleted_flag && (deleted_flag<=msgnum))
--msgnum;
grab_quotes(NULL, NULL);
break;
}
if ((msgs[msgnum].ownersys) && (!msgs[msgnum].owneruser))
grab_user_name(&(msgs[msgnum].msg),subboards[curlsub].filename);
grab_quotes(&(msgs[msgnum].msg),subboards[curlsub].filename);
ss=syscfg.sl[actsl];
if (msgs[msgnum].status & status_post_new_net) {
set_net_num(msgs[msgnum].title[80]);
if (msgs[msgnum].title[80]==-1) {
pl(get_string(679));
break;
}
}
if ((lcs()) || (ss.ability & ability_read_post_anony) || (msgs[msgnum].anony==0))
email(msgs[msgnum].owneruser,msgs[msgnum].ownerys,0,0);
else
email(msgs[msgnum].owneruser,msgs[msgnum].ownersys,0,msgs[msgnum].anony);
grab_quotes(NULL, NULL);
break;
Step #4: Compile the BBS.
Step #5: Email me, and tell me how much you hate it, so I will stop putting
out such foolish trash.
If it causes a solar eclipse, the ozone to explode, Mother Theresa to lose her
virginity and makes John C. Holmes come back to life, it's your fault.
If you have any questions, email me:
WWIVnet 1@3653
SOLARnet 1@13651
IceNET 1@3652
RCnet 1@2
TestNet 1@3650
WWIVLink 1@13659
or call my sucky board: Out Of Time, (316)/788-9495....
Well boys, that's it for this time... Z-ya......